home *** CD-ROM | disk | FTP | other *** search
- /* wraps.c generated from wraps.psw
- by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989
- */
-
- #include <dpsclient/dpsfriends.h>
- #include <string.h>
-
- #line 1 "wraps.psw"
- #line 10 "wraps.c"
- void PSW_transformToFit(Rot, angle, w, h)
- int Rot; int angle; float w; float h;
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjReal obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjReal obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjGeneric obj6;
- DPSBinObjGeneric obj7;
- DPSBinObjGeneric obj8;
- DPSBinObjGeneric obj9;
- DPSBinObjGeneric obj10;
- DPSBinObjGeneric obj11;
- DPSBinObjGeneric obj12;
- DPSBinObjGeneric obj13;
- DPSBinObjGeneric obj14;
- DPSBinObjGeneric obj15;
- DPSBinObjGeneric obj16;
- } _dpsQ;
- static _dpsQ _dpsF = {
- DPS_DEF_TOKENTYPE, 17, 140,
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: w */
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54}, /* div */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56}, /* dup */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: h */
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54}, /* div */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56}, /* dup */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173}, /* translate */
- {DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: angle */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 136}, /* rotate */
- {DPS_LITERAL|DPS_INT, 0, 0, -1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108}, /* mul */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
- {DPS_LITERAL|DPS_INT, 0, 0, -1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108}, /* mul */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173}, /* translate */
- }; /* _dpsQ */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
-
- _dpsP[9].val.integerVal = angle;
- _dpsP[0].val.realVal = w;
- _dpsP[4].val.realVal = h;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,140);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 7 "wraps.psw"
-
- #line 69 "wraps.c"
- void PSW_flipHor(w, h)
- float w; float h;
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjReal obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- } _dpsQ;
- static _dpsQ _dpsF = {
- DPS_DEF_TOKENTYPE, 6, 52,
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: w */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173}, /* translate */
- {DPS_LITERAL|DPS_INT, 0, 0, -1},
- {DPS_LITERAL|DPS_INT, 0, 0, 1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 139}, /* scale */
- }; /* _dpsQ */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
-
- _dpsP[0].val.realVal = w;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,52);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 12 "wraps.psw"
-
- #line 104 "wraps.c"
- void PSW_flipVer(w, h)
- float w; float h;
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjReal obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- } _dpsQ;
- static _dpsQ _dpsF = {
- DPS_DEF_TOKENTYPE, 6, 52,
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: h */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173}, /* translate */
- {DPS_LITERAL|DPS_INT, 0, 0, 1},
- {DPS_LITERAL|DPS_INT, 0, 0, -1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 139}, /* scale */
- }; /* _dpsQ */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- char pad[3];
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
-
- _dpsP[1].val.realVal = h;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,52);
- if (0) *pad = 0; /* quiets compiler warnings */
- }
- #line 17 "wraps.psw"
-
-